home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Interactive 7
/
PC World Interactive 7.iso
/
program
/
qblib1.EXE
/
LIBRARY.BI
next >
Wrap
Text File
|
1996-07-19
|
2KB
|
72 lines
'
' This metafile is created for LIBRARY.QLB/LIB, the perfect library for QB7.1
'
' Deyvi Levitas 1/6/96
'
TYPE RegType
ax AS INTEGER
bx AS INTEGER
cx AS INTEGER
dx AS INTEGER
bp AS INTEGER
si AS INTEGER
di AS INTEGER
flags AS INTEGER
END TYPE
TYPE RegTypeX
ax AS INTEGER
bx AS INTEGER
cx AS INTEGER
dx AS INTEGER
bp AS INTEGER
si AS INTEGER
di AS INTEGER
flags AS INTEGER
ds AS INTEGER
es AS INTEGER
END TYPE
DECLARE SUB Interrupt (intnum AS INTEGER, inreg AS RegType, outreg AS RegType)
DECLARE SUB InterruptX (intnum AS INTEGER, inreg AS RegTypeX, outreg AS RegTypeX)
DECLARE SUB Absolute (address AS INTEGER)
DECLARE SUB Int86Old (intnum AS INTEGER, inarray() AS INTEGER, outarray() AS INTEGER)
DECLARE SUB Int86XOld (intnum AS INTEGER, inarray() AS INTEGER, outarray() AS INTEGER)
DECLARE SUB Ansicheck (yuklu)
DECLARE SUB Biosdate (bios$)
DECLARE SUB Capson ()
DECLARE SUB Capsoff ()
DECLARE SUB Cleankeybbuffer ()
DECLARE SUB Copy (source$, target$)
DECLARE SUB Copypage (pagenumber)
DECLARE SUB Currentdir (drive$, cdir$)
DECLARE SUB Day.Month (Day$, month$)
DECLARE SUB dosver (verhi, verlo, revision$, area$)
DECLARE SUB Drivecheck (drive$, hazir!)
DECLARE SUB Errorref (errorno!, return$)
DECLARE SUB Fancycls (style!)
DECLARE SUB Fileexist (File$, exist!)
DECLARE SUB Filesize (File$, size!)
DECLARE SUB Freespace (drive$, free$)
DECLARE SUB Getkey (key$)
DECLARE SUB Getvol (drive$, vol$)
DECLARE SUB Kutu (x, y, xx, yy, o, f)
DECLARE SUB Mesaj (title$, msg$)
DECLARE SUB Mouse (msatir, msutun, mtus)
DECLARE SUB Mousegoster ()
DECLARE SUB Mousekontrol (yuklu)
DECLARE SUB Mousepen (dikeysatir, dikeysutun, yataysatir, yataysutun)
DECLARE SUB Mousesakla ()
DECLARE SUB Percentbox (renkcerceve, renkkutu, renkpercent, percent, title$)
DECLARE SUB Printercheck (value!)
DECLARE SUB QInput (satir!, sutun!, yazirenk1, barrenk!, uzunluk!, degisken$)
DECLARE SUB Reboot ()
DECLARE SUB RestorePage (pagenumber)
DECLARE SUB Screenstyle (style!)
DECLARE SUB SendLinefeed ()
DECLARE SUB SendToCom (send$, comnumber)
DECLARE SUB Soundeffect (soundnumber!)
DIM SHARED inreg AS RegType, outreg AS RegType